home *** CD-ROM | disk | FTP | other *** search
/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_3 / issue07 / pipeline / printers / allen / _run next >
Encoding:
Text File  |  1990-01-14  |  1.6 KB  |  50 lines
  1. | > !PipeDream.!Run
  2. |
  3. | PipeDream 3.06 (16-Oct-89)
  4. |
  5. Set PipeDream$Dir <Obey$Dir>
  6. |
  7. | Set up file types
  8. |
  9. RMEnsure internationalkeyboard 0.17 RMreinit internationalkeyboard
  10. RMKill internationalkeyboard
  11. Alphabet BFONT
  12. IconSprites <PipeDream$Dir>.!Sprites
  13. SetMacro Alias$@RunType_DDE   Run <PipeDream$Dir>.!Run %%*0
  14. SetMacro Alias$@PrintType_DDE Run <PipeDream$Dir>.!Run -Print %%*0
  15. Set File$Type_DDE PDream
  16. SetMacro Alias$@RunType_D21   Run <PipeDream$Dir>.!Run -Macro %%*0
  17. Set File$Type_D21 PDMacro
  18. |
  19. | Ensure we have FPEmulator
  20. |
  21. RMEnsure FPEmulator 2.70 If "<System$Path>" = "" then Error 0 System resources cannot be found
  22. RMEnsure FPEmulator 2.70 RMLoad System:Modules.FPEmulator
  23. RMEnsure FPEmulator 2.70 Error You need FPEmulator 2.70 or later
  24. |
  25. | Ensure we have ColourTrans
  26. |
  27. RMEnsure ColourTrans 0.51 If "<System$Path>" = "" then Error 0 System resources cannot be found
  28. RMEnsure ColourTrans 0.51 RMLoad System:Modules.Colours
  29. RMEnsure ColourTrans 0.51 Error You need ColourTrans 0.51 or later
  30. |
  31. | Ensure we have the shared C library
  32. |
  33. Set PipeDream$CLibLoaded 1
  34. RMEnsure SharedCLibrary 0.00 Set PipeDream$CLibLoaded 0
  35. If PipeDream$CLibLoaded=0 then If "<System$Path>" = "" then Error 0 System resources cannot be found
  36. If PipeDream$CLibLoaded=0 then RMLoad System:Modules.CLib
  37. RMEnsure SharedCLibrary 3.40 Error You need SharedCLibrary 3.40 or later
  38. Unset PipeDream$CLibLoaded
  39. |
  40. If "<PipeDream$Path>" = "" then Obey <PipeDream$Dir>.!Path
  41. |
  42. | Allocate fixed memory for documents
  43. |
  44. WimpSlot -min 432k -max 432k
  45. WimpSlot -min 384k -max 384k
  46. |
  47. | Go, Go, Go
  48. |
  49. Run <PipeDream$Dir>.!RunImage %*0
  50.